home *** CD-ROM | disk | FTP | other *** search
/ Games of Daze / Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso / djgpp / contrib / pdcurs22 / src / portable / inchstr.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-01-26  |  6.8 KB  |  228 lines
  1. /*
  2. ***************************************************************************
  3. * This file comprises part of PDCurses. PDCurses is Public Domain software.
  4. * You may use this code for whatever purposes you desire. This software
  5. * is provided AS IS with NO WARRANTY whatsoever.
  6. * Should this software be used in another application, an acknowledgement
  7. * that PDCurses code is used would be appreciated, but is not mandatory.
  8. *
  9. * Any changes which you make to this software which may improve or enhance
  10. * it, should be forwarded to the current maintainer for the benefit of 
  11. * other users.
  12. *
  13. * The only restriction placed on this code is that no distribution of
  14. * modified PDCurses code be made under the PDCurses name, by anyone
  15. * other than the current maintainer.
  16. * 
  17. * See the file maintain.er for details of the current maintainer.
  18. ***************************************************************************
  19. */
  20. #define    CURSES_LIBRARY    1
  21. #include <curses.h>
  22.  
  23. /* undefine any macros for functions defined in this module */
  24. #undef    inchstr
  25. #undef    inchnstr
  26. #undef    winchstr
  27. #undef    winchnstr
  28. #undef    mvinchstr
  29. #undef    mvinchnstr
  30. #undef    mvwinchstr
  31. #undef    mvwinchnstr
  32.  
  33. /* undefine any macros for functions called by this module if in debug mode */
  34. #ifdef PDCDEBUG
  35. #  undef    move
  36. #  undef    wmove
  37. #endif
  38.  
  39. #ifdef PDCDEBUG
  40. char *rcsid_inchstr  = "$Id$";
  41. #endif
  42.  
  43. /*man-start*********************************************************************
  44.  
  45.   Name:                                                        inchstr
  46.  
  47.   Synopsis:
  48.       int inchstr(chtype *ch);
  49.       int inchnstr(chtype *ch, int n);
  50.       int winchstr(WINDOW *win, chtype *ch);
  51.       int winchnstr(WINDOW *win, chtype *ch, int n);
  52.       int mvinchstr(int y, int x, chtype *ch);
  53.       int mvinchnstr(int y, int x, chtype *ch, int n);
  54.       int mvwinchstr(WINDOW *, int y, int x, chtype *ch);
  55.       int mvwinchnstr(WINDOW *, int y, int x, chtype *ch, int n);
  56.  
  57.   X/Open Description:
  58.      These routines read a chtype string directly from the window structure
  59.      starting at the current position and ending at the right margin.
  60.      The four routines with n as the last argument copy at most n
  61.      elements, but no more than will fit on the line.
  62.  
  63.      NOTE:    inchstr(), mvinchstr(), mvwinchstr() inchnstr(), 
  64.          mvinchnstr(), and mvwinchnstr() are implemented as macros.
  65.  
  66.   X/Open Return Value:
  67.      All functions return ERR on error and an integer value other than
  68.      ERR on success. 
  69.  
  70.   X/Open Errors:
  71.      Normally the value returned indicates the number of chtypes
  72.      returned.
  73.  
  74.   Portability                             X/Open    BSD    SYS V
  75.                                           Dec '88
  76.       inchstr                               -        -      4.0
  77.       winchstr                              -        -      4.0
  78.       mvinchstr                             -        -      4.0
  79.       mvwinchstr                            -        -      4.0
  80.       inchnstr                              -        -      4.0
  81.       winchnstr                             -        -      4.0
  82.       mvinchnstr                            -        -      4.0
  83.       mvwinchnstr                           -        -      4.0
  84.  
  85. **man-end**********************************************************************/
  86.  
  87. /***********************************************************************/
  88. int    inchstr(chtype *ch)
  89. /***********************************************************************/
  90. {
  91.     int i;
  92. #ifdef PDCDEBUG
  93.     if (trace_on) PDC_debug("inchstr() - called\n");
  94. #endif
  95.  
  96.     if (stdscr == (WINDOW *)NULL)
  97.         return( ERR );
  98.  
  99.     return( inchnstr( ch, stdscr->_maxx - stdscr->_curx ) );
  100. }
  101. /***********************************************************************/
  102. int    inchnstr(chtype *ch, int n)
  103. /***********************************************************************/
  104. {
  105.     chtype    *ptr = &(stdscr->_y[stdscr->_cury][stdscr->_curx]);
  106.     int    i;
  107. #ifdef PDCDEBUG
  108.     if (trace_on) PDC_debug("inchnstr() - called\n");
  109. #endif
  110.  
  111.     if (stdscr == (WINDOW *)NULL)
  112.         return( ERR );
  113.  
  114.     if (n < 0)
  115.         return( ERR );
  116.  
  117.     if ((stdscr->_curx + n) > stdscr->_maxx)
  118.         n = stdscr->_maxx - stdscr->_curx;
  119.  
  120.     for(i=0;i<n;i++)
  121.         *ch++ = *ptr++;
  122.  
  123.     *ch = (chtype)0;
  124.     return(i);
  125. }
  126. /***********************************************************************/
  127. int    winchstr(WINDOW *win, chtype *ch)
  128. /***********************************************************************/
  129. {
  130. #ifdef PDCDEBUG
  131.     if (trace_on) PDC_debug("winchstr() - called\n");
  132. #endif
  133.  
  134.     if (win == (WINDOW *)NULL)
  135.         return( ERR );
  136.  
  137.     return(winchnstr(win,ch,win->_maxx - win->_curx));
  138. }
  139. /***********************************************************************/
  140. int    winchnstr(WINDOW *win, chtype *ch, int n)
  141. /***********************************************************************/
  142. {
  143.     chtype    *ptr = &(win->_y[win->_cury][win->_curx]);
  144.     int    i;
  145. #ifdef PDCDEBUG
  146.     if (trace_on) PDC_debug("winchnstr() - called\n");
  147. #endif
  148.  
  149.     if (win == (WINDOW *)NULL)
  150.         return( ERR );
  151.  
  152.     if (n < 0)
  153.         return( ERR );
  154.  
  155.     if ((win->_curx + n) > win->_maxx)
  156.         n = win->_maxx - win->_curx;
  157.  
  158.     for(i=0;i<n;i++)
  159.         *ch++ = *ptr++;
  160.  
  161.     *ch = (chtype)0;
  162.     return(i);
  163. }
  164. /***********************************************************************/
  165. int    mvinchstr(int y, int x, chtype *ch)
  166. /***********************************************************************/
  167. {
  168. #ifdef PDCDEBUG
  169.     if (trace_on) PDC_debug("mvinchstr() - called: y %d x %d\n",y,x);
  170. #endif
  171.  
  172.     if (stdscr == (WINDOW *)NULL)
  173.         return( ERR );
  174.  
  175.     if (wmove(stdscr,y,x) == ERR)
  176.         return( ERR );
  177.  
  178.     return( inchnstr( ch, stdscr->_maxx - stdscr->_curx) );
  179. }
  180. /***********************************************************************/
  181. int    mvinchnstr(int y, int x, chtype *ch, int n)
  182. /***********************************************************************/
  183. {
  184. #ifdef PDCDEBUG
  185.     if (trace_on) PDC_debug("mvinchnstr() - called: y %d x %d n %d\n",y,x,n);
  186. #endif
  187.  
  188.     if (stdscr == (WINDOW *)NULL)
  189.         return( ERR );
  190.  
  191.     if (wmove(stdscr,y,x) == ERR)
  192.         return( ERR );
  193.  
  194.     return( inchnstr( ch, n) );
  195. }
  196. /***********************************************************************/
  197. int    mvwinchstr(WINDOW *win, int y, int x, chtype *ch)
  198. /***********************************************************************/
  199. {
  200. #ifdef PDCDEBUG
  201.     if (trace_on) PDC_debug("winchstr() - called:\n");
  202. #endif
  203.  
  204.     if (win == (WINDOW *)NULL)
  205.         return( ERR );
  206.  
  207.     if (wmove(win,y,x) == ERR)
  208.         return( ERR );
  209.  
  210.     return( winchnstr( win, ch, win->_maxx - win->_curx) );
  211. }
  212. /***********************************************************************/
  213. int    mvwinchnstr(WINDOW *win,int y, int x, chtype *ch, int n)
  214. /***********************************************************************/
  215. {
  216. #ifdef PDCDEBUG
  217.     if (trace_on) PDC_debug("mvwinchnstr() - called: y %d x %d n %d \n",y,x,n);
  218. #endif
  219.  
  220.     if (win == (WINDOW *)NULL)
  221.         return( ERR );
  222.  
  223.     if (wmove(win,y,x) == ERR)
  224.         return( ERR );
  225.  
  226.     return( winchnstr( win, ch, n) );
  227. }
  228.